Lingvistica's Bezoekerhulp

".$invr_rchs; $bzv1_kaal=str_replace("-","+",$invr_rchs); echo "
".$bzv1_kaal; $bzv1_kaal=str_replace(".","",$bzv1_kaal); // echo "
".$bzv1_kaal; $bzv1_kaal=str_replace(" ","+",$bzv1_kaal); // $bzv1_kaal=trim($bzv1_kaal); // $invr_rchs=$bzv1_kaal; $base_rchs=str_replace("+"," ",$bzv1_kaal); $base_rchs=str_replace("* "," ",$bzv1_kaal); $base_rchs=str_replace(" *"," ",$bzv1_kaal); ///////////////////////////////////////////////// $rchs_dtls=explode(" ",$invr_rchs); // print_r($rchs_dtls); // echo "
INVR CORP ".$invr_corp; if ($invr_corp == null) { // $invr_corp="semanta"; } if ($invr_lgrm == null) { $invr_lgrm="a"; } if ($invr_taal == null) { $invr_taal="nederlands"; } echo "
Op zoek naar ".$invr_rchs; echo ""; // echo ""; $zoek_rchs="% ".$invr_rchs." %"; // echo "
Op zoek naar ".urlencode($zoek_rchs).""; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $invr_tabl="lpzg"; $sqltref="SELECT * FROM `$invr_tabl` where `lnks` like '$zoek_rchs' order by `lnks` asc"; $trefresult = mysql_query($sqltref, $link); $tref_num = mysql_num_rows($trefresult); // echo "
Extract LPZG Aantallen ".$tref_num." ".$invr_tabl." voor ".$sqltref; if ($tref_num > 1) { while ($row = mysql_fetch_assoc($trefresult)) { $id=$row['id']; $levl=$row['levl']; $levl=$levl+1; $ipad=$row['ipad']; $taal=$row['taal']; $domn=$row['domn']; $lnks=$row['lnks']; $sqltref="UPDATE `pswd` SET `levl`='$levl',`datm`='$datm' where `ipad` = '$sub_line'"; $lpzg_array[$invr_rchs."@".$lnks]=$lpzg_array[$invr_rchs."@".$lnks]+1; } } $datm=date("Y-m-d H:i:s", time()); echo "
Begin ".$datm; $lpzg_scds=round($tref_num/30); echo "
Ik heb voor ".$invr_rchs." ".$tref_num." zinnen gevonden en de verwerking duurt ongveer ".$lpzg_scds." secondes."; $dble_rslt=bepl_sgmt($invr_bzv1,"dble"); $dble_wrds=explode(" ",$invr_bzv1); print_r($dble_rslt); $sw=0; $dble_midn=""; foreach($dble_wrds as $dble_key => $dble_val) { $dble_key=trim($dble_val); // echo ""; // echo "
DBLE val ".$dble_val; // $dble_dtls=explode(" ",$dble_key); // print_r($dble_dtls); // $dble_zoek=$dble_dtls[0]; if (strlen($dble_key) > 3) { $wtvr_rslt=xtrt_xxxx($dble_val,"nederlands","wtvr",2); // print_r($wtvr_rslt); if (count($wtvr_rslt) >0 ) { $data_rslt=xtrt_xxxx($dble_key,"nederlands","lpzg",8; foreach($data_rslt as $data_key => $data_val) { $data_dtls=explode("!!",$data_key); $data_domn=$data_dtls[2]; $data_lnks=$data_dtls[3]; $data_rchs=$data_dtls[4]; if($drelt != $data_domn.$data_lnks) { if (substr($data_rchs,0,6)== "./data") { echo "Bewerk ".$data_lnks.""; } echo "

".$data_domn." ".$data_lnks."

".$data_rchs."

"; $drelt=$data_domn.$data_lnks; } } print_r($lpzg_array); } if (count($lpzg_array) > 0) { $find_rchs="".$invr_rchs.""; echo ""; foreach($lpzg_array as $lpzg_key => $lpzg_val) { $lpzg_dtls=explode("@",$lpzg_key); // print_r($lpzg_dtls); $lpzg_text=$lpzg_dtls[1]; $lpzg_text=strtolower($lpzg_text); $slpzg_text=str_replace(" ","+",$lpzg_text); $plpzg_text=str_replace($invr_rchs,$find_rchs,$lpzg_text); // echo "
INVR RCHS ".$invr_rchs." SLPZG TEXT ".$slpzg_text." PLPZG TEXT ".$plpzg_text; if (strlen($lpzg_text) <128) { $llpzg_text="".$plpzg_text.""; echo ""; } } } exit; /////////// foreach($lpzg_rslt as $subs_key => $subs_val) { $subs_val=$subs_val."."; $strn_rpos=strpos($subs_val,$invr_rchs); $deel_itms=explode($invr_rchs,$subs_key); if ($lrelt != $subs_key) { $lnks_sgmt=""; $lc=0; $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_scre=$subs_dtls[0]; $subs_taal=$subs_dtls[1]; $subs_domn=$subs_dtls[2]; if ($subs_domn == $invr_corp) { $totl_domn[$subs_domn]=$totl_domn[$subs_domn]+1; } } } echo "

Website	Taal	Gesprekspartner	Uiting	Reactie
".$dble_frst." * ".$dble_last." * ".$dble_midn."
".$find_rchs."
".$llpzg_text."

"; arsort($totl_domn); echo ""; echo ""; $sw=0; echo ""; foreach ($totl_domn as $totl_key => $totl_val) { if ($sw == 6) { echo ""; $sw=0; } if ($totl_key == null) { $totl_key="semanta"; } echo ""; $sw=$sw+1; } echo ""; echo "

".$invr_rchs."

".$totl_key."#".$totl_val."

"; // print_r($totl_domn); echo ""; foreach($lpzg_rslt as $subs_key => $subs_val) { $subs_val=$subs_val."."; $strn_rpos=strpos($subs_val,$invr_rchs); $deel_itms=explode($invr_rchs,$subs_key); if ($lrelt != $subs_key) { $lnks_sgmt=""; $lc=0; $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_scre=$subs_dtls[0]; $subs_taal=$subs_dtls[1]; $subs_domn=$subs_dtls[2]; $totl_domn[$subs_domn]=$totl_domn[$subs_domn]+1; if ($invr_corp == $subs-domn) { $subs_lnks=$subs_dtls[3]; $subs_rchs=$subs_dtls[4]; $subs_lnks=strtolower($subs_lnks); $usubs_lnks=urlencode($subs_lnks); $subs_domn=strtolower($subs_domn); $usubs_domn=urlencode($subs_domn); $subs_domn=str_replace("-",",",$subs_domn); // echo ""; $usubs_lnks=str_replace("%22","",$usubs_lnks); $usubs_lnks=str_replace("%28","",$usubs_lnks); $usubs_lnks=str_replace("%29","",$usubs_lnks); $usubs_lnks=str_replace("%2C","",$usubs_lnks); $usubs_lnks=str_replace("%2F"," ",$usubs_lnks); $usubs_lnks=str_replace("%3A","",$usubs_lnks); $usubs_lnks=str_replace("%3F","",$usubs_lnks); $usubs_lnks=str_replace("%91","",$usubs_lnks); $usubs_lnks=str_replace("%92","",$usubs_lnks); $usubs_lnks=str_replace("%BF","",$usubs_lnks); $usubs_lnks=str_replace("%F6","oe",$usubs_lnks); $usubs_lnks=str_replace("++","+",$usubs_lnks); $subs_lnks=urldecode($usubs_lnks); $sgmt_lnks=bepl_sgmt($subs_lnks); // echo ""; // ksort($sgmt_lnks); // print_r($sgmt_lnks); $sw=0; // echo ""; $sgmt_summ=""; $pinvr_rchs="".$invr_rchs.""; foreach($sgmt_lnks as $sgmt_key => $sgmt_val) { $sgmt_key=trim($sgmt_key); if ($srelt != $sgmt_key) { $srelt=$sgmt_key; if ($sw < 10 and $sgmt_key != "wat wordt het" and count($sgmt_lnks) > 2) { $sw=$sw+1; $tlkd_scnd=smta_tlkd($sgmt_key."@scnd"); foreach($tlkd_scnd as $scnd_key => $scnd_val) { // echo ""; } // print_r($tlkd_scnd); // echo ""; $psgmt_key=str_replace($invr_rchs,$pinvr_rchs,$sgmt_key); // echo ""; $sgmt_summ=$sgmt_summ.$sgmt_key."@"; } } } // echo "
".$sgmt_summ; $sgmt_array[$sgmt_summ]=$sgmt_array[$sgmt_summ]+1; $domn_wrds=explode(",",$subs_domn); // print_r($domn_wrds); asort($data_wrds); foreach($domn_wrds as $wrds_key => $wrds_val) { $wrds_val=trim($wrds_val); $wrds_val=trim($wrds_val); // echo ""; $data_wrds=explode("/",$wrds_val); // echo "
"; // print_r($data_wrds); if (count($data_wrds) > 1 and $data_wrds[0] == ".") { if (drelt != $wrds_val) { $subs_lnks=str_replace("-",",",$subs_lnks); $lnks_wrds=explode(",",$subs_lnks); // print_r($lnks_wrds); $drelt=$wrds_val; $wrds_val=str_replace("utterance.reaction",$invr_rchs,$wrds_val); foreach($lnks_wrds as $lnks_key => $lnks_val) { // echo "
DATA FILE...<category><pattern>".$lnks_val."</pattern><template>".$wrds_val."</template></category>"; } } } else { $wrds_val=str_replace("utterance.reaction",$invr_rchs,$wrds_val); // echo ""; // echo "
DATA TEXT...<category><pattern>".$wrds_val."</pattern><template>".$subs_lnks."</template></category>"; } } $lnks_lnes=explode(".",$subs_lnks); foreach($lnks_lnes as $lnes_key => $lnes_val) { $lnes_val=trim($lnes_val); $lnks_wrds=explode(" ",$lnes_val); // print_r($lnks_wrds); foreach($lnks_wrds as $lnks_key => $lnks_val) { if ($lc < 3) { $lnks_sgmt=$lnks_sgmt." ".$lnks_val; $lc=$lc+1; } if ($lc == 3) { // echo ""; $lnks_sgmt=""; $lc=0; } } } if ($lnks_sgmt != null) { // echo ""; } $lnks_sgmt=""; $lc=0; // echo ""; $lrelt=$subs_key; if($strn_rpos === false) { // echo ">"; } else { $sgmt_rslt=bepl_sgmt($subs_key); // echo ">"; // print_r($sgmt_rslt); } } strtolower($subs_key); // echo ""; $subs_rchs=str_replace(".","",$subs_rchs); // echo ""; /////////////////////// // $subs_rchs=str_replace(" ","+",$subs_rchs); $tlkd_pos=strpos($subs_rchs,$invr_rchs,0); // $pinvr_rchs"".$invr_rchs.""; // $pline_bzv1=str_replace($invr_rchs,$pinvr_rchs,$subs_rchs); // echo "
".$ptlkd_form; if ($tlkd_pos === false) { // echo "
The string ".$tlkd_form." was not found in the string ".$line_bzv1; } else { $splt_itms=explode($invr_rchs,$subs_rchs); // print_r($splt_itms); $splt_lnks=$splt_itms[0]; $splt_rchs=$splt_itms[1]; $ssplt_lnks=str_replace(" ","+",$splt_lnks); $ssplt_rchs=str_replace(" ","+",$splt_rchs); $sinvr_rchs=str_replace(" ","+",$invr_rchs); //echo "
".$sinvr_rchs."_".$ssplt_rchs; if (strlen($splt_lnks) < 512 and strlen($splt_rchs) <512) { // print_r($splt_itms); $splt_itms=str_replace("+"," ",$splt_itms); $ssplt_lnks=str_replace(" ","+",$splt_lnks); $srslt_rchs=str_replace(" ","+",$invr_rchs); $lrslt_rchs="".$invr_rchs.""; // echo ""; $aiml_ptrn=$splt_lnks." ".$rslt_rchs; $aiml_tmpl=$splt_rchs; if ($aiml_tmpl == null) { $spec_rslt=bepl_spec($aiml_ptrn); // echo "
SPEC RSLT ".$spec_rslt; $spec_dtls=explode(">",$spec_rslt); // print_r($spec_dtls); foreach($spec_dtls as $spec_key => $spec_val) { $spec_dtls=explode("!!",$spec_val); $aiml_tmpl = $spec_dtls[0]."@".$spec_dtls[1]; // echo ""; // echo ""; } // print_r($spec_dtls); foreach($spec_dtls as $spec_key => $spec_val) { // echo "
".$spec_dtls[0]."".$spec_dtls[1]; if ($spec_val != $spec_rslt) { $spec_dtls[1]=trim($spec_dtls[1]); if (count($spec_dtls) > 1 and $spec_val != null and $spec_dtls[1] != null) { $spec_conc=str_replace("!!","",$spec_dtls[1]); // echo "
".$spec_dtls[0]."".$spec_dtls[1]; } } } } $aiml_tmpl=str_replace("@","",$aiml_tmpl); echo "

".$usubs_domn."
".$usubs_domn."	".$usubs_lnks."
--".$scnd_key."	--".$scnd_val."	--".$sgmt_key."	--".$subs_rchs."	".$psgmt_key."
".$wrds_val."
".$wrds_val."	".urlencode($subs_lnks)."
".$lnks_sgmt."
".$lnks_sgmt."
".$subs_key."
".$invr_rchs."	".$deel_itms[0]."	".$invr_rchs."	".$deel_itms[1]."
".$invr_rchs."	".$deel_itms[0]."	".$invr_rchs."	".$deel_itms[1]."
SUBS KEY ".$subs_key."	".$subs_val."
".$invr_rchs."	".$subs_lnks;"	".$subs_rchs."
".$splt_itms[0]."		".$lrslt_rchs."	".$splt_itms[1]."
".$spec_dtls[0]."	".$spec_dtls[1]."
".$spec_val."
RSLT RCHS ".$rslt_rchs."	AIML PTRN ".$aiml_ptrn." AIMl TMPL ".$aiml_tmpl; /// if ($arelt != $aiml_ptrn.$aimpl_tmpl) { $sql1 = "INSERT INTO `aiml` (`id`,`bot_id`,`pattern`,`thatpattern`,`template`,`topic`,`filename`) VALUES (NULL,'1','$aiml_ptrn','','$aiml_tmpl','$invr_rchs','admin_added.aiml')"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); // $logentry_result = mysql_query($sql1, $link); $arelt=$aiml_ptrn.$aimpl_tmpl; } } } } } exit; // echo "

"; // echo "

SGMT ARRAY "; $datm=date("Y-m-d H:i:s", time()); echo "
Einde ".$datm; foreach($sgmt_array as $sgmt_key => $sgmt_val) { $sgmt_itms=explode("@",$sgmt_key); $line=$sgmt_key; include("conv-line-bzv1.php"); $sgmt_key=$line; $psgmt_key=str_replace($invr_rchs,$pinvr_rchs,$sgmt_key); // $psgmt_key=str_replace("@"," ",$psgmt_key); // $psgmt_key=trim($psgmt_key); $psgmt_key=str_replace("@","
",$psgmt_key); echo "

".$psgmt_key."

"; } // print_r($sgmt_array); /////////// exit; if (count($rchs_dtls) > 0) { $lpzg_word=str_replace("* "," ",$invr_rchs); $lpzg_word=str_replace(" *"," ",$invr_rchs); // $lpzg_word=trim($lpzg_word); $spec_rslt=bepl_spec($rslt_rchs); $spec_dtls=explode(">",$spec_rslt); // print_r($spec_dtls); echo ""; foreach($lpzg_rslt as $subs_key => $subs_val) { $subs_val=$subs_val."."; $strn_rpos=strpos($subs_val,$invr_rchs); $deel_itms=explode($invr_rchs,$string); if($strn_rpos === false) { } else { echo ">"; } strtolower($subs_key); // echo ""; $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_scre=$subs_dtls[0]; $subs_taal=$subs_dtls[1]; $subs_domn=$subs_dtls[2]; $subs_lnks=$subs_dtls[3]; $subs_rchs=$subs_dtls[4]; $subs_rchs=str_replace(".","",$subs_rchs); // echo "
INVR RCHS ".$invr_rchs." SUBS RCHS ".$subs_rchs; /////////////////////// // $subs_rchs=str_replace(" ","+",$subs_rchs); $tlkd_pos=strpos($subs_rchs,$invr_rchs,0); // $pinvr_rchs"".$invr_rchs.""; // $pline_bzv1=str_replace($invr_rchs,$pinvr_rchs,$subs_rchs); // echo "
".$ptlkd_form; if ($tlkd_pos === false) { // echo "
The string ".$tlkd_form." was not found in the string ".$line_bzv1; } else { $splt_itms=explode($invr_rchs,$subs_rchs); // print_r($splt_itms); $splt_lnks=$splt_itms[0]; $splt_rchs=$splt_itms[1]; $ssplt_lnks=str_replace(" ","+",$splt_lnks); $ssplt_rchs=str_replace(" ","+",$splt_rchs); $sinvr_rchs=str_replace(" ","+",$invr_rchs); //echo "
".$sinvr_rchs."_".$ssplt_rchs; if (strlen($splt_lnks) < 512 and strlen($splt_rchs) <512) { // print_r($splt_itms); $splt_itms=str_replace("+"," ",$splt_itms); $ssplt_lnks=str_replace(" ","+",$splt_lnks); $srslt_rchs=str_replace(" ","+",$invr_rchs); $lrslt_rchs="".$invr_rchs.""; echo ""; $aiml_ptrn=$splt_lnks." ".$rslt_rchs; $aiml_tmpl=$splt_rchs; if ($aiml_tmpl == null) { $spec_rslt=bepl_spec($aiml_ptrn); // echo "
SPEC RSLT ".$spec_rslt; $spec_dtls=explode(">",$spec_rslt); // print_r($spec_dtls); foreach($spec_dtls as $spec_key => $spec_val) { $spec_dtls=explode("!!",$spec_val); $aiml_tmpl = $spec_dtls[0]."@".$spec_dtls[1]; echo ""; // echo ""; } // print_r($spec_dtls); foreach($spec_dtls as $spec_key => $spec_val) { // echo "
".$spec_dtls[0]."".$spec_dtls[1]; if ($spec_val != $spec_rslt) { $spec_dtls[1]=trim($spec_dtls[1]); if (count($spec_dtls) > 1 and $spec_val != null and $spec_dtls[1] != null) { $spec_conc=str_replace("!!","",$spec_dtls[1]); // echo "
".$spec_dtls[0]."".$spec_dtls[1]; } } } } $aiml_tmpl=str_repalce("@","",$aiml_tmpl); echo "

".$deel_itms[0]."

".$invr_rchs."

".$deel_itms[1]."

".$subs_key."

".$subs_val."

".$splt_itms[0]."

".$lrslt_rchs."

".$splt_itms[1]."

".$spec_dtls[0]."

".$spec_dtls[1]."

".$spec_val."

AIML PTRN ".$aiml_ptrn." AIMl TMPL ".$aiml_tmpl; $sql1 = "INSERT INTO `wiml` (`id`,`bot_id`,`pattern`,`thatpattern`,`template`,`topic`,`filename`) VALUES (NULL,'1','$rslt_rchs','$aiml_ptrn','','$aiml_tmpl','','$invr_corp')"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); // $logentry_result = mysql_query($sql1, $link); } } } } exit; ///////////////////////////////////////////////// $url="https://api.gavagai.se/v3/lexicon/nl/kunstmatige%20intelligentie?apiKey=3ae70a6b61efad7a7a69b9a82f20a7df&polarizeWord=false"; $url="https://api.gavagai.se/v3/lexicon/nl?apiKey=3ae70a6b61efad7a7a69b9a82f20a7df&offset=0&pageSize=10"; $ch = curl_init( $url ); # Setup request to send json via POST. $payload = json_encode( array( "customer"=> $data ) ); curl_setopt( $ch, CURLOPT_POSTFIELDS, $payload ); curl_setopt( $ch, CURLOPT_HTTPHEADER, array('Content-Type:application/json')); # Return response instead of printing. curl_setopt( $ch, CURLOPT_RETURNTRANSFER, 1); # Send request. $result = curl_exec($ch); curl_close($ch); # Print response. echo "

$result

"; $json = json_decode($result); // echo "
JSON
".$json; // print_r($json); ////////////////////// echo ""; foreach($json as $json_key => $json_val) { // echo "
JSON EXPLOSIE "; if ($json_key == "responses") { if ($json_key == null) { echo "
STRING IS EMPTY "; } // echo ""; foreach($json_val as $files_key => $files_val) { $string=$files_val; $string = preg_replace ('/<[^>]*>/', ' ', $string); // ----- remove control characters ----- $string = str_replace("\r", '', $string); $string = str_replace("\n", ' ', $string); $string = str_replace("\t", ' ', $string); // ----- remove multiple spaces ----- $string = trim(preg_replace('/ {2,}/', ' ', $string)); // $files_splt=explode("%3E",urlencode($files_val)); // print_r($files_splt); // echo ""; // echo "
".urlencode(substr($files_val,0,26))."

"; if (substr($files_val,0,26) == "wat wilt u daarover zeggen") { $files_val="geen direct antwoord"; // echo ""; $sgmt_rslt=bepl_sgmt($invr_bzv1); foreach($sgmt_rslt as $rslt_key => $rslt_val) { $ssgmt_key=str_replace(" ","+",$rslt_key); // echo ""; } $educ_text=$invr_bzv1."+betekent+"; // echo "

".$educ_text."

"; } else { $string=$files_val; $string = preg_replace ('./<[^>]*>/', ' ', $string); // ----- remove control characters ----- $string = str_replace("\r", '', $string); $string = str_replace("\n", ' ', $string); $string = str_replace("\t", ' ', $string); // ----- remove multiple spaces ----- $string = trim(preg_replace('/ {2,}/', ' ', $string)); $files_splt=explode("%0A",urlencode($files_val)); // print_r($files_splt); foreach($files_splt as $file_key => $file_val) { echo ""; $file_val=str_replace("%3A+","",$file_val); if (substr($file_val,0,8) == "Bezoeker") { $file_val1=str_replace("Tutorials...","",$file_val); echo ""; } if (substr($file_val,0,8) != "Bezoeker") { $file_val2=str_replace("Tutorials...","",$file_val); echo ""; $text_val2=urldecode($file_val2); $http_dtls=explode("https",$text_val2); print_r($http_dtls); } } } } // echo ""; } } echo "

".$json_key."	".$json_val."
".$invr_bzv1."
".$string."
".$files_val."
".$sgmt_key."
".$file_val."
Geen antwoord ".urldecode($file_val1)."
".urldecode($file_val2)."
".$string."

"; ////////////////////// ?>

Segment	>
Corpus	>
Table	>